Chip 2001 June/CHIP Haziran 2001.iso/prog/video/04/setup.exe/TMPGEnc.exe/1033/RCDATA/TMPEGCONFIG_CLIPRECTFORM/TMPEGCONFIG_CLIPRECTFORM.txt

Text File | 2001-04-04 | 12KB | 483 lines

object MPEGConfig_ClipRectForm: TMPEGConfig_ClipRectForm
  Left = 276
  Top = 189
  BorderStyle = bsDialog
  Caption = 'Clip frame'
  ClientHeight = 443
  ClientWidth = 649
  Color = clBtnFace
  Constraints.MinHeight = 470
  Constraints.MinWidth = 657
  Font.Charset = ANSI_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poScreenCenter
  Scaled = False
  ShowHint = True
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 12
  object Bevel2: TBevel
    Left = 119
    Top = 286
    Width = 418
    Height = 150
    Anchors = [akBottom]
    Shape = bsFrame
  end
  object ScrollBox1: TScrollBox
    Left = 5
    Top = 6
    Width = 640
    Height = 272
    Anchors = [akLeft, akTop, akRight, akBottom]
    PopupMenu = PopupMenu1
    TabOrder = 0
    OnDblClick = ResultVideoBoxDblClick
    object ResultVideoBox: TDXPaintBox
      Left = 0
      Top = 0
      Width = 636
      Height = 252
      AutoStretch = True
      Center = True
      KeepAspect = True
      Stretch = True
      ViewWidth = 0
      ViewHeight = 0
      Align = alClient
      OnClick = ResultVideoBoxClick
      OnDblClick = ResultVideoBoxDblClick
    end
    object DoubleClickLabel: TLabel
      Left = 168
      Top = 122
      Width = 322
      Height = 12
      Anchors = []
      Caption = 'Double click here to select video source to display.'
    end
    object VideoScrollBar: TScrollBar
      Left = 0
      Top = 252
      Width = 636
      Height = 16
      Align = alBottom
      Enabled = False
      PageSize = 1
      TabOrder = 0
      OnChange = VideoScrollBarChange
      OnScroll = VideoScrollBarScroll
    end
  end
  object DefaultButton: TButton
    Left = 546
    Top = 287
    Width = 97
    Height = 25
    Anchors = [akRight, akBottom]
    Caption = 'Default'
    TabOrder = 1
    OnClick = DefaultButtonClick
  end
  object OKButton: TButton
    Left = 546
    Top = 379
    Width = 97
    Height = 25
    Anchors = [akRight, akBottom]
    Caption = 'OK'
    ModalResult = 1
    TabOrder = 2
    OnClick = OKButtonClick
  end
  object CancelButton: TButton
    Left = 546
    Top = 411
    Width = 97
    Height = 25
    Anchors = [akRight, akBottom]
    Cancel = True
    Caption = 'Cancel'
    ModalResult = 2
    TabOrder = 3
  end
  object PageControl: TPageControl
    Left = 130
    Top = 296
    Width = 397
    Height = 135
    ActivePage = ClipRectTabSheet
    Anchors = [akBottom]
    Style = tsButtons
    TabOrder = 4
    OnChange = PageControlChange
    object ClipRectTabSheet: TTabSheet
      Caption = 'Clip frame setting'
      object Label33: TLabel
        Left = 8
        Top = 14
        Width = 29
        Height = 12
        Caption = '&Top:'
        FocusControl = Video_ClipRect_Top
      end
      object Label37: TLabel
        Left = 8
        Top = 41
        Width = 28
        Height = 12
        Caption = '&Left:'
        FocusControl = Video_ClipRect_Left
      end
      object Label24: TLabel
        Left = 138
        Top = 14
        Width = 30
        Height = 12
        Caption = '&Bottom:'
        FocusControl = Video_ClipRect_Bottom
      end
      object Label25: TLabel
        Left = 138
        Top = 41
        Width = 30
        Height = 12
        Caption = '&Right:'
        FocusControl = Video_ClipRect_Right
      end
      object ClipSizeLabel: TLabel
        Left = 118
        Top = 65
        Width = 24
        Height = 12
        Caption = '----'
      end
      object Bevel3: TBevel
        Left = 0
        Top = 0
        Width = 386
        Height = 2
        Anchors = [akLeft, akTop, akRight]
      end
      object ClipSizeCaptionLabel: TLabel
        Left = 8
        Top = 65
        Width = 99
        Height = 12
        Caption = 'Size after clipping:'
      end
      object Bevel6: TBevel
        Left = 0
        Top = 82
        Width = 388
        Height = 2
        Anchors = [akLeft, akTop, akRight]
      end
      object Video_ClipRect_Top: TSpinExEdit
        Left = 54
        Top = 10
        Width = 69
        Height = 21
        AlignValue = False
        CanFloatValue = False
        Increment = 1
        MaxValue = 10000
        TabOrder = 0
        Value = 0
        OnChange = Video_ClipRectChange
        OnKeyDown = EditKeyDown
      end
      object Video_ClipRect_Left: TSpinExEdit
        Left = 54
        Top = 37
        Width = 69
        Height = 21
        AlignValue = False
        CanFloatValue = False
        Increment = 1
        MaxValue = 10000
        TabOrder = 2
        Value = 0
        OnChange = Video_ClipRectChange
        OnKeyDown = EditKeyDown
      end
      object Video_ClipRect_Bottom: TSpinExEdit
        Left = 184
        Top = 10
        Width = 69
        Height = 21
        AlignValue = False
        CanFloatValue = False
        Increment = 1
        MaxValue = 10000
        TabOrder = 1
        Value = 0
        OnChange = Video_ClipRectChange
        OnKeyDown = EditKeyDown
      end
      object Video_ClipRect_Right: TSpinExEdit
        Left = 184
        Top = 37
        Width = 69
        Height = 21
        AlignValue = False
        CanFloatValue = False
        Increment = 1
        MaxValue = 10000
        TabOrder = 3
        Value = 0
        OnChange = Video_ClipRectChange
        OnKeyDown = EditKeyDown
      end
      object Video_Mask_Top: TCheckBox
        Left = 268
        Top = 8
        Width = 117
        Height = 17
        Caption = 'Top mask'
        TabOrder = 4
        OnClick = Video_ClipRectChange
      end
      object Video_Mask_Bottom: TCheckBox
        Left = 268
        Top = 26
        Width = 117
        Height = 17
        Caption = 'Bottom Mask'
        TabOrder = 5
        OnClick = Video_ClipRectChange
      end
      object Video_Mask_Left: TCheckBox
        Left = 268
        Top = 44
        Width = 117
        Height = 17
        Caption = 'Left Mask'
        TabOrder = 6
        OnClick = Video_ClipRectChange
      end
      object Video_Mask_Right: TCheckBox
        Left = 268
        Top = 61
        Width = 117
        Height = 17
        Caption = 'Right Mask'
        TabOrder = 7
        OnClick = Video_ClipRectChange
      end
      object ClipPreviewCheckBox: TCheckBox
        Left = 8
        Top = 88
        Width = 257
        Height = 17
        Caption = 'Resized image is used to display preview'
        TabOrder = 8
        OnClick = PageControlChange
      end
    end
    object ImageArrangeTabSheet: TTabSheet
      Caption = 'Arrange setting'
      ImageIndex = 1
      object Label11: TLabel
        Left = 8
        Top = 14
        Width = 90
        Height = 12
        Caption = '&Arrange Method:'
        FocusControl = Video_ImageArrange
      end
      object Label12: TLabel
        Left = 214
        Top = 38
        Width = 6
        Height = 12
        Caption = 'x'
      end
      object Label15: TLabel
        Left = 296
        Top = 38
        Width = 43
        Height = 12
        Caption = 'pixels'
      end
      object Bevel1: TBevel
        Left = 0
        Top = 61
        Width = 388
        Height = 2
        Anchors = [akLeft, akTop, akRight]
      end
      object OutputFormatCaptionLabel: TLabel
        Left = 8
        Top = 88
        Width = 86
        Height = 12
        Caption = 'Output format:'
      end
      object OutputFormatLabel: TLabel
        Left = 106
        Top = 88
        Width = 24
        Height = 12
        Caption = '----'
      end
      object InputFormatCaptionLabel: TLabel
        Left = 8
        Top = 72
        Width = 86
        Height = 12
        Caption = 'Input format:'
      end
      object InputFormatLabel: TLabel
        Left = 106
        Top = 72
        Width = 24
        Height = 12
        Caption = '----'
      end
      object Bevel4: TBevel
        Left = 0
        Top = 0
        Width = 388
        Height = 2
        Anchors = [akLeft, akTop, akRight]
      end
      object Video_ImageArrange: TComboBox
        Left = 144
        Top = 10
        Width = 233
        Height = 20
        Hint =
          'Set how to arrange Source Video'#13#10#13#10'<> Center'#13#10#13#10'Movie will be di' +
          'splayed at the center of window.'#13#10#13#10'<> Center (keep aspect ratio' +
          ')'#13#10#13#10'Movie will be displayed at the center of window at the same' +
          ' time the aspect ratio is kept.'#13#10#13#10'<> Center (custom size)'#13#10#13#10'Mo' +
          'vie will be displayed at the center of window in any size.'#13#10#13#10'<>' +
          ' Full screen'#13#10#13#10'Display with Maximized window.'#13#10#13#10'<> Full screen' +
          ' (keep aspect ratio)'#13#10#13#10'Maximize windows at the same time keepin' +
          'g aspect ratio.'#13#10#13#10'<> Full screen (keep aspect ratio 2)'#13#10#13#10'Maxim' +
          'ize windows at the same time keeping aspect ratio'#13#10'and displayed' +
          ' movie size in full screen.'#13#10#13#10'<> No margin(keep aspect ratio)'#13#10 +
          #13#10'Maximize the window so that no margin will appear, then someti' +
          'me the edge of video is cut out.'#13#10
        Style = csDropDownList
        ItemHeight = 0
        TabOrder = 0
        OnChange = Video_ImageArrangeChange
        OnKeyDown = EditKeyDown
      end
      object Video_ImageArrangeWidth: TSpinExEdit
        Left = 144
        Top = 34
        Width = 65
        Height = 21
        Hint =
          'Set window size when the movie is displayed at the center of dis' +
          'play.'
        AlignValue = False
        CanFloatValue = False
        FloatValue = 1
        Increment = 2
        MaxValue = 999999
        MinValue = 1
        TabOrder = 1
        Value = 1
        OnChange = Video_ImageArrangeWidthHeightChange
        OnKeyDown = EditKeyDown
      end
      object Video_ImageArrangeHeight: TSpinExEdit
        Left = 225
        Top = 34
        Width = 64
        Height = 21
        Hint =
          'Set window size when the movie is displayed at the center of dis' +
          'play.'
        AlignValue = False
        CanFloatValue = False
        FloatValue = 1
        Increment = 2
        MaxValue = 999999
        MinValue = 1
        TabOrder = 2
        Value = 1
        OnChange = Video_ImageArrangeWidthHeightChange
        OnKeyDown = EditKeyDown
      end
    end
    object FillColorTabSheet: TTabSheet
      Caption = 'Mask Color'
      ImageIndex = 2
      object Bevel5: TBevel
        Left = 0
        Top = 0
        Width = 388
        Height = 2
        Anchors = [akLeft, akTop, akRight]
      end
      object FillColorPanel: TPanel
        Left = 99
        Top = 24
        Width = 153
        Height = 65
        BevelOuter = bvNone
        BorderStyle = bsSingle
        TabOrder = 0
        OnDblClick = FillColorButtonClick
      end
      object FillColorButton: TButton
        Left = 271
        Top = 44
        Width = 75
        Height = 25
        Caption = 'Edit Color'
        TabOrder = 1
        OnClick = FillColorButtonClick
      end
    end
  end
  object PopupMenu1: TPopupMenu
    Left = 350
    Top = 166
    object N1: TMenuItem
      Tag = 1
      Caption = 'Original size'
      OnClick = N1Click
    end
    object N2: TMenuItem
      Tag = 2
      Caption = 'Zoom 2x'
      OnClick = N1Click
    end
    object N3: TMenuItem
      Tag = 3
      Caption = 'Zoom 3x'
      OnClick = N1Click
    end
    object N4: TMenuItem
      Tag = 4
      Caption = 'Zoom 4x'
      OnClick = N1Click
    end
    object N5: TMenuItem
      Caption = '-'
    end
    object C1: TMenuItem
      Caption = '&Copy to clipboard'
      ShortCut = 16451
      OnClick = C1Click
    end
  end
  object ColorDialog: TColorDialog
    Ctl3D = True
    Left = 24
    Top = 304
  end
end